# Load shiny package

library(shiny)

shinyUI(
  fluidPage(
    titlePanel("Demostration of sliderInput widget in shiny"),
    sidebarLayout(
      sidebarPanel(
        sliderInput(
          inputId = "slide",
          label = "Select the value from Slider",
          min = 0,
          max = 5,
          value = 2,
          animate = T)
        
        
      ),
      mainPanel(
        textOutput("out")
      )
    )
  )
)